home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / GAM / R-S / RoboWar 2.3.sea / RoboWar 2.3 / More Robots / Ghost < prev    next >
Text File  |  1990-09-18  |  972b  |  14 lines
  1. {Ghost - Deadlier than its AD&D counterpart
  2. Matthew Sakai
  3. IX a.d. Kal. May anno domini MCMXC (4/23/90)}
  4.  
  5. start: random 72 / 1 + speedx' store random 72 / 1 + speedy' store speedy speedx arctan aim' store main jump
  6. main: x 200 > negx if energy 140 > shoot if y 200 > negy if radar rund if x 100 < posx if y 100 < posy if range runn if main jump
  7. negx: random -72 / 1 - speedx' store speedx speedy arctan aim' store return
  8. negy: random -72 / 1 - speedy' store speedx speedy arctan aim' store return
  9. posx: random 72 / 1 + speedx' store speedx speedy arctan aim' store return
  10. posy: random 72 / 1 + speedy' store speedx speedy arctan aim' store return
  11. shoot: 20 missile' store speedx chs speedx' store speedy chs speedy' store aim 180 + aim' store return
  12. rund: radar 80 < junk if speedx chs speedx' store speedy chs speedy' store aim 180 + aim' store return
  13. runn: range 80 < junk if speedx chs speedx' store speedy chs speedy' store aim 180 + aim' store return
  14. junk: drop return